home
***
CD-ROM
|
disk
|
FTP
|
other
***
search
/
Loadstar 136
/
136.d81
/
rom read 1571
(
.txt
)
< prev
next >
Wrap
Commodore BASIC
|
2022-08-26
|
197b
|
9 lines
10 input"[147]device number";d
20 open15,d,15
30 print#15,"m-r"chr$(0)chr$(192)chr$(1):get#15,a$:a=asc(a$)
40 ifa=56thenprint"new rom":goto80
50 ifa=66thenprint"old rom":goto80
60 ifa=132thenprint"128d":goto80
70 print"not recognized 1571 rom"
80 close15